home *** CD-ROM | disk | FTP | other *** search
/ Aminet 21 / Aminet 21 (1997)(GTI - Schatztruhe)[!][Oct 1997].iso / Aminet / misc / emu / iecutil.lha / inc / exec / ports.h < prev    next >
Encoding:
Text File  |  1997-05-06  |  1.3 KB  |  41 lines
  1. {$ifndef EXEC_PORTS_H   ***** EXEC/PORTS.H *****}
  2. CONST EXEC_PORTS_H = 0;
  3. {$ifndef EXEC_NODES_H;incl"exec/nodes.h";endif}
  4. {$ifndef EXEC_LISTS_H;incl"exec/lists.h";endif}
  5. {$ifndef EXEC_TASKS_H;incl"exec/tasks.h";endif}
  6. TYPE p_MsgPort = ^MsgPort;
  7.      MsgPort = record
  8.                  mp_Node: Node;
  9.                  mp_Flags, mp_SigBit: Byte;
  10.                  mp_SigTask: p_Task;
  11.                  mp_MsgList: List;
  12.                end;
  13. CONST PF_ACTION = 3;
  14.       PA_SIGNAL = 0;
  15.       PA_SOFTINT = 1;
  16.       PA_IGNORE = 2;
  17. TYPE p_Message = ^Message;
  18.      Message = record
  19.                  mn_Node: Node;
  20.                  mn_ReplyPort: p_MsgPort;
  21.                  mn_Length: Word;
  22.                end;
  23. {$endif}
  24. {$ifndef EXEC_PORTS_LIB}
  25. Const EXEC_PORTS_LIB = 0;
  26. Library Sysbase:
  27. -312: Function SetExcept(d0, d1: Long): Long;
  28. -342: Function AllocTrap(d0: integer): integer;
  29. -348: Procedure FreeTrap(d0: integer);
  30. -354: Procedure AddPort(a1: p_MsgPort);
  31. -360: Procedure RemPort(a1: p_MsgPort);
  32. -366: Procedure PutMsg(a0: p_MsgPort; a1: p_Message);
  33. -372: Function GetMsg(a0: p_MsgPort): p_Message;
  34. -378: Procedure ReplyMsg(a1: p_Message);
  35. -384: Function WaitPort(a0: p_MsgPort): p_Message;
  36. -390: Function FindPort(a1: stryng): p_MsgPort;
  37. -666: Function CreateMsgPort: p_MsgPort;
  38. -672: Procedure DeleteMsgPort(a0: p_MsgPort)
  39. end;
  40. {$endif}
  41.